home *** CD-ROM | disk | FTP | other *** search
- object frmUpload: TfrmUpload
- Left = 215
- Top = 195
- BorderIcons = []
- BorderStyle = bsDialog
- Caption = 'Uploading Files to Web Server'
- ClientHeight = 181
- ClientWidth = 393
- Color = clBtnFace
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clBlack
- Font.Height = -11
- Font.Name = 'Tahoma'
- Font.Pitch = fpVariable
- Font.Style = []
- OldCreateOrder = True
- Position = poScreenCenter
- Scaled = False
- OnClose = FormClose
- OnCreate = FormCreate
- OnShow = FormShow
- PixelsPerInch = 96
- TextHeight = 13
- object pageUpload: TPageControl
- Left = 0
- Top = 0
- Width = 393
- Height = 181
- ActivePage = tabUpload
- Align = alClient
- TabOrder = 0
- object tabProjectOptions: TTabSheet
- Caption = 'tabProjectOptions'
- TabVisible = False
- object Label1: TLabel
- Left = 8
- Top = 3
- Width = 369
- Height = 57
- AutoSize = False
- Caption =
- ' When you upload your project files you have the option to Publi' +
- 'sh these files according to your Project Publishing rules. You m' +
- 'ay publish them directly to your server without making changes t' +
- 'o the document or you can Publish the documents themselves.'
- WordWrap = True
- end
- object Bevel1: TBevel
- Left = 0
- Top = 133
- Width = 385
- Height = 2
- end
- object butPublishContinue: TButton
- Left = 223
- Top = 142
- Width = 75
- Height = 25
- Caption = 'C&ontinue'
- Default = True
- TabOrder = 0
- OnClick = butPublishContinueClick
- end
- object butPublishCancel: TButton
- Left = 306
- Top = 142
- Width = 75
- Height = 25
- Cancel = True
- Caption = '&Cancel'
- ModalResult = 2
- TabOrder = 1
- end
- object radServer: TRadioButton
- Left = 117
- Top = 74
- Width = 113
- Height = 17
- Caption = 'Publish to &Server'
- Checked = True
- TabOrder = 2
- TabStop = True
- end
- object radDocument: TRadioButton
- Left = 117
- Top = 102
- Width = 124
- Height = 17
- Caption = 'Publish to &Document'
- TabOrder = 3
- end
- end
- object tabUpload: TTabSheet
- Caption = 'tabUpload'
- TabVisible = False
- object bvlFTP: TBevel
- Tag = 39
- Left = 6
- Top = 107
- Width = 373
- Height = 21
- end
- object lblFTPStatus: TLabel
- Tag = 39
- Left = 10
- Top = 109
- Width = 363
- Height = 17
- AutoSize = False
- Color = clBtnFace
- ParentColor = False
- end
- object lblUpFTPStat: TLabel
- Left = 7
- Top = 87
- Width = 56
- Height = 13
- Caption = 'FTP Status:'
- end
- object Bevel2: TBevel
- Left = -1
- Top = 133
- Width = 385
- Height = 2
- end
- object butCancel: TButton
- Left = 305
- Top = 142
- Width = 75
- Height = 25
- Cancel = True
- Caption = '&Cancel'
- TabOrder = 0
- OnClick = butCancelClick
- end
- object Memo1: TMemo
- Left = 2
- Top = 182
- Width = 669
- Height = 280
- ScrollBars = ssBoth
- TabOrder = 1
- end
- object animProgress: TAnimate
- Left = 50
- Top = 10
- Width = 276
- Height = 71
- Active = False
- AutoSize = False
- Center = False
- StopFrame = 19
- end
- end
- end
- object timGo: TTimer
- Enabled = False
- Interval = 10
- OnTimer = timGoTimer
- Left = 316
- Top = 82
- end
- object ctlFTP: TSausageFTP
- WinsockStarted = False
- Port = 21
- TimeOut = 0
- TransferMode = ttBinaryTransfer
- OnFtpError = ctlFTPFtpError
- Left = 40
- Top = 132
- end
- end
-